home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Arsenal Files 6
/
The Arsenal Files 6 (Arsenal Computer).ISO
/
business
/
splt231w.zip
/
THPGL2.ZIP
/
T220.BAS
< prev
next >
Wrap
BASIC Source File
|
1995-05-01
|
237b
|
9 lines
10 OPEN "T220.PLT" FOR OUTPUT AS 1
20 PRINT #1,"INPS7000,5000SP1SI.7,1PA1000,1000
30 PI=3.141593
40 A=TAN(20*(PI/180))
50 PRINT #1,"SL"A"LB+ Slant"+CHR$(3)
60 PRINT #1,"PA1000,300SL-.36LB- Slant"+CHR$(3)
70 PRINT #1,"PG;"
80 END